home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-05 / sectra.exe / SECTRA.BAT < prev    next >
DOS Batch File  |  1992-10-03  |  588b  |  26 lines

  1. @echo off
  2. set AutoLoad=FALSE
  3. :start
  4. sectratr
  5. if ERRORLEVEL 2 goto AutoLoad
  6. if ERRORLEVEL 1 goto FatalError
  7. if ERRORLEVEL 0 goto End
  8. echo Sectra for DOS exited with an undefined ERRORLEVEL
  9. goto End
  10. :FatalError
  11. echo Sectra for DOS exited with a Fatal Error.
  12. echo Contact Thomas-Conrad Technical Support, (800) 334-4112
  13. goto End
  14. :AutoLoad
  15. if "%AutoLoad%" == "TRUE" goto BtrieveError
  16. echo Attempting to load Btrieve...
  17. btrieve
  18. set AutoLoad=TRUE
  19. goto start
  20. :BtrieveError
  21. echo Btrieve could not be loaded.
  22. :End
  23. if "%AutoLoad%" == "TRUE" ubtrieve
  24. :CleanUp
  25. set AutoLoad=
  26.